home *** CD-ROM | disk | FTP | other *** search
/ Programming Languages Suite / ProgramD2.iso / T U R B O Language / Turbo Pascal V7.0 / UTILS.ZIP / DEFAULTS.TEM < prev    next >
Text File  |  1992-10-30  |  9KB  |  393 lines
  1. Script  DEFAULTS;
  2.  
  3.  
  4. /***********************************************************************
  5.  
  6.       Default editor bindings for Borland/Turbo Pascal IDE.
  7.  
  8.     This file contains a Turbo Editor Macro Language (TEML) script which
  9. is the default editor bindings for the Borland/Turbo Pascal IDEs as
  10. shipped.  A complete description of the TEML language and the Turbo Editor
  11. Macro Compiler (TEMC) can be found in the file "TEMC.DOC".
  12.  
  13.     The TEMC compiler can be invoked from the DOS command line at
  14. follows:
  15.  
  16.       temc [-c] defaults.tem <IDE configuration file><.CMD><.TP>
  17.  
  18. The optional -c switch can also be specified as /c, and can appear in
  19. any argument position on the command line. If you use this option,
  20. any existing command table in your configuration file is thrown away
  21. before the script file is merged with those already defined. The
  22. configuration file extension must be specified as TEMC will modify both DOS
  23. and Windows IDEs config files.  Specify .CMD or .TP extentions for Windows
  24. or DOS IDE, respectively. If the .CMD file does not exist, it will be
  25. created. The .TP file must exist, or an error is displayed.
  26.  
  27. /* macro definitions for anything which isn't an editor primitive */
  28.  
  29. MACRO MacScrollUp
  30.         ScrollScreenUp;FixCursorPos;
  31. END;
  32.  
  33. MACRO MacScrollDown
  34.         ScrollScreenDown;FixCursorPos;
  35. END;
  36.  
  37. MACRO MacPageUp
  38.         SetPrevPos;FixScreenPos;PageUp;FixCursorPos;
  39. END;
  40.  
  41. MACRO MacPageDown
  42.         SetPrevPos;FixScreenPos;PageDown;FixCursorPos;
  43. END;
  44.  
  45. MACRO MacWordLeft
  46.         SetPrevPos;WordLeft;
  47. END;
  48.  
  49. MACRO MacWordRight
  50.         SetPrevPos;WordRight;
  51. END;
  52.  
  53. MACRO MacDeleteLine
  54.         DeleteLine;LeftOfLine;
  55. END;
  56.  
  57. MACRO MacLeftOfLine
  58.         SetPrevPos;LeftOfLine;
  59. END;
  60.  
  61. MACRO MacRightOfLine
  62.         SetPrevPos;RightOfLine;
  63. END;
  64.  
  65. MACRO MacTopOfScreen
  66.     SetPrevPos;TopOfScreen;
  67. END;
  68.  
  69. MACRO MacBottomOfScreen
  70.     SetPrevPos;BottomOfScreen;
  71. END;
  72.  
  73. MACRO MacHomeCursor
  74.         SetPrevPos;HomeCursor;
  75. END;
  76.  
  77. MACRO MacEndCursor
  78.         SetPrevPos;EndCursor;
  79. END;
  80.  
  81. MACRO MacOpenLine
  82.         SetPrevPos;RightOfLine;LiteralChar(13);
  83. END;
  84.  
  85. MACRO MacInsertStar
  86.         InsertText("*");
  87. END;
  88.  
  89. MACRO MacInsertMinus
  90.         InsertText("-");
  91. END;
  92.  
  93. MACRO MacInsertPlus
  94.         InsertText("+");
  95. END;
  96.  
  97. MACRO MacMarkCursorSwitchedRight
  98.   ExtendBlockBeg;CursorSwitchedRight;ExtendBlockEnd;HighlightBlock;
  99. END;
  100.  
  101. MACRO MacMarkCursorSwitchedLeft
  102.   ExtendBlockBeg;CursorSwitchedLeft;ExtendBlockEnd;HighlightBlock;
  103. END;
  104.  
  105. MACRO MacMarkCursorUp
  106.   ExtendBlockBeg;CursorUp;ExtendBlockEnd;HighlightBlock;
  107. END;
  108.  
  109. MACRO MacMarkCursorDown
  110.   ExtendBlockBeg;CursorDown;ExtendBlockEnd;HighlightBlock;
  111. END;
  112.  
  113. MACRO MacMarkPageUp
  114.   ExtendBlockBeg;PageUp;FixCursorPos;ExtendBlockEnd;HighlightBlock;
  115. END;
  116.  
  117. MACRO MacMarkPageDown
  118.   ExtendBlockBeg;PageDown;FixCursorPos;ExtendBlockEnd;HighlightBlock;
  119. END;
  120.  
  121. MACRO MacMarkWordLeft
  122.   ExtendBlockBeg;WordLeft;ExtendBlockEnd;HighlightBlock;
  123. END;
  124.  
  125. MACRO MacMarkWordRight
  126.   ExtendBlockBeg;WordRight;ExtendBlockEnd;HighlightBlock;
  127. END;
  128.  
  129. MACRO MacMarkLeftOfLine
  130.   ExtendBlockBeg;LeftOfLine;ExtendBlockEnd;HighlightBlock;
  131. END;
  132.  
  133. MACRO MacMarkRightOfLine
  134.   ExtendBlockBeg;RightOfLine;ExtendBlockEnd;HighlightBlock;
  135. END;
  136.  
  137. MACRO MacMarkTopOfScreen
  138.   ExtendBlockBeg;TopOfScreen;ExtendBlockEnd;HighlightBlock;
  139. END;
  140.  
  141. MACRO MacMarkBottomOfScreen
  142.   ExtendBlockBeg;BottomOfScreen;ExtendBlockEnd;HighlightBlock;
  143. END;
  144.  
  145. MACRO MacMarkHomeCursor
  146.   ExtendBlockBeg;HomeCursor;ExtendBlockEnd;HighlightBlock;
  147. END;
  148.  
  149. MACRO MacMarkEndCursor
  150.   ExtendBlockBeg;EndCursor;ExtendBlockEnd;HighlightBlock;
  151. END;
  152.  
  153. MACRO MacSetBlockBeg
  154.     HideBlock;SetBlockBeg;HighlightBlock;
  155. END;
  156.  
  157. MACRO MacSetBlockEnd
  158.     HideBlock;SetBlockEnd;HighlightBlock;
  159. END;
  160.  
  161. MACRO MacMarkLine
  162.         HideBlock;SetTempPos;RightOfLine;
  163.             CursorCharRight;SetBlockEnd;
  164.             CursorCharLeft;LeftOfLine;SetBlockBeg;
  165.             HighlightBlock;MoveToTempPos;
  166. END;
  167.  
  168. MACRO MacMarkWord
  169.         HideBlock;SetTempPos;CursorRight;WordLeft;
  170.             RightOfWord;SetBlockEnd;WordLeft;
  171.             SetBlockBeg;HighlightBlock;MoveToTempPos;
  172.             
  173. END;
  174.  
  175. MACRO MacMoveToBlockBeg
  176.     SetPrevPos;MoveToBlockBeg;CenterFixScreenPos;
  177. END;
  178.  
  179. MACRO MacMoveToBlockEnd
  180.     SetPrevPos;MoveToBlockEnd;CenterFixScreenPos;
  181. END;
  182.  
  183. MACRO MacMoveToPrevPos
  184.     SwapPrevPos;CenterFixScreenPos;
  185. END;
  186.  
  187. MACRO MacCopyBlock
  188.         CopyBlock;HighlightBlock;CenterFixScreenPos;
  189.             
  190. END;
  191.  
  192. MACRO MacMoveBlock
  193.         MoveBlock;HighlightBlock;CenterFixScreenPos;
  194.             
  195. END;
  196.  
  197. MACRO MacDeleteBlock
  198.     DeleteBlock;CenterFixScreenPos;HideBlock;
  199. END;
  200.  
  201.  
  202. MACRO MacBreakLine
  203.         LiteralChar(13);CursorCharLeft;
  204. END;
  205.  
  206.  
  207. MACRO MacGoto0
  208.         SetPrevPos;MoveToMark(0); CenterFixScreenPos;
  209. END;
  210.  
  211. MACRO MacGoto1
  212.         SetPrevPos;MoveToMark(1); CenterFixScreenPos;
  213. END;
  214.  
  215. MACRO MacGoto2
  216.         SetPrevPos;MoveToMark(2); CenterFixScreenPos;
  217. END;
  218.  
  219. MACRO MacGoto3
  220.         SetPrevPos;MoveToMark(3); CenterFixScreenPos;
  221. END;
  222.  
  223. MACRO MacGoto4
  224.         SetPrevPos;MoveToMark(4); CenterFixScreenPos;
  225. END;
  226.  
  227. MACRO MacGoto5
  228.         SetPrevPos;MoveToMark(5); CenterFixScreenPos;
  229. END;
  230.  
  231. MACRO MacGoto6
  232.         SetPrevPos;MoveToMark(6); CenterFixScreenPos;
  233. END;
  234.  
  235. MACRO MacGoto7
  236.         SetPrevPos;MoveToMark(7); CenterFixScreenPos;
  237. END;
  238.  
  239. MACRO MacGoto8
  240.         SetPrevPos;MoveToMark(8); CenterFixScreenPos;
  241. END;
  242.  
  243. MACRO MacGoto9
  244.         SetPrevPos;MoveToMark(9); CenterFixScreenPos;
  245. END;
  246.  
  247. MACRO MacMatchPairForward
  248.         SetPrevPos;MatchPairForward;
  249. END;
  250.  
  251. MACRO MacMatchPairBackward
  252.         SetPrevPos;MatchPairBackward;
  253. END;
  254.  
  255. MACRO MacGetFindString
  256.         SetPrevPos;GetFindString;
  257. END;
  258.  
  259. MACRO MacRepeatSearch
  260.         SetPrevPos;RepeatSearch;
  261. END;
  262.  
  263. MACRO MacReplace
  264.         SetPrevPos;Replace;
  265. END;
  266.  
  267. /**** key bindings ******/
  268. Esc : NullCmd;
  269. ctrl-A : MacWordLeft;
  270. ctrl-C : MacPageDown;
  271. ctrl-D : CursorSwitchedRight;
  272. ctrl-E : CursorUp;
  273. ctrl-F : MacWordRight;
  274. ctrl-G : DeleteChar;
  275. ctrl-H : BackspaceDelete;
  276. ctrl-I : SmartTab;
  277. ctrl-L : MacRepeatSearch;
  278. ctrl-N : MacBreakLine;
  279. ctrl-P : LiteralChar;
  280. ctrl-R : MacPageUp;
  281. ctrl-S : CursorSwitchedLeft;
  282. ctrl-T : DeleteWord;
  283. ctrl-V : ToggleInsert;
  284. ctrl-W : MacScrollDown;
  285. ctrl-X : CursorDown;
  286. ctrl-Y : MacDeleteLine;
  287. ctrl-Z : MacScrollUp;
  288.  
  289. /* ---- Function and special keys */
  290.  
  291. /* the following three keys refer to the ones on the numeric keypad */
  292. star: MacInsertStar;
  293. minus: MacInsertMinus;
  294. plus: MacInsertPlus;
  295.  
  296. bksp : BackspaceDelete;
  297. shift-bksp : BackspaceDelete;
  298. lfar : CursorSwitchedLeft;
  299. rgar : CursorSwitchedRight;
  300. upar : CursorUp;
  301. dnar : CursorDown;
  302. pgup : MacPageUp;
  303. pgdn : MacPageDown;
  304. end : MacRightOfLine;
  305. home : MacLeftOfLine;
  306. ins : ToggleInsert;
  307. del : DeleteChar;
  308. ctrl-lfar : WordLeft;
  309. ctrl-rgar : WordRight;
  310. ctrl-end : MacBottomOfScreen;
  311. ctrl-home : MacTopOfScreen;
  312. ctrl-pgdn : MacEndCursor;
  313. ctrl-pgup : MacHomeCursor;
  314. shift-tab : BackSpaceDelete;
  315. tab : SmartTab;
  316. ctrl-enter : OpenFileAtCursor;
  317.  
  318. shift-lfar : MacMarkCursorSwitchedLeft;
  319. shift-rgar : MacMarkCursorSwitchedRight;
  320. shift-upar : MacMarkCursorUp;
  321. shift-dnar : MacMarkCursorDown;
  322. shift-pgup : MacMarkPageUp;
  323. shift-pgdn : MacMarkPageDown;
  324. shift-end : MacMarkRightOfLine;
  325. shift-home : MacMarkLeftOfLine;
  326.  
  327.  
  328. /* ---- Control K sequences ------------------ */
  329.  
  330. ctrl-K+^B : MacSetBlockBeg;
  331. ctrl-K+^C : MacCopyBlock;
  332. ctrl-K+^D : Menu;
  333. ctrl-K+^H : ToggleHideBlock;
  334. ctrl-K+^I : IndentBlock;
  335. ctrl-K+^K : MacSetBlockEnd;
  336. ctrl-K+^L : MacMarkLine;
  337. ctrl-K+^P : PrintBlock;
  338. ctrl-K+^Q : Menu;
  339. ctrl-K+^R : ReadBlock;
  340. ctrl-K+^S : SaveFile;
  341. ctrl-K+^T : MacMarkWord;
  342. ctrl-K+^U : OutdentBlock;
  343. ctrl-K+^V : MacMoveBlock;
  344. ctrl-K+^W : WriteBlock;
  345. ctrl-K+^Y : MacDeleteBlock;
  346. ctrl-K+0 : SetMark(0);
  347. ctrl-K+1 : SetMark(1);
  348. ctrl-K+2 : SetMark(2);
  349. ctrl-K+3 : SetMark(3);
  350. ctrl-K+4 : SetMark(4);
  351. ctrl-K+5 : SetMark(5);
  352. ctrl-K+6 : SetMark(6);
  353. ctrl-K+7 : SetMark(7);
  354. ctrl-K+8 : SetMark(8);
  355. ctrl-K+9 : SetMark(9);
  356.  
  357. /* ---- Control Q sequences ------------------ */
  358.  
  359. ctrl-Q+^A : MacReplace;
  360. ctrl-Q+^B : MacMoveToBlockBeg;
  361. ctrl-Q+^C : MacEndCursor;
  362. ctrl-Q+^D : RightOfLine;
  363. ctrl-Q+^E : MacTopOfScreen;
  364. ctrl-Q+^F : MacGetFindString;
  365. ctrl-Q+^K : MacMoveToBlockEnd;
  366. ctrl-Q+^P : MacMoveToPrevPos;
  367. ctrl-Q+^R : MacHomeCursor;
  368. ctrl-Q+^S : LeftOfLine;
  369. ctrl-Q+^W : LastError;
  370. ctrl-Q+^X : MacBottomOfScreen;
  371. ctrl-Q+^Y : DeleteToEol;
  372. ctrl-Q+0 : MacGoto0;
  373. ctrl-Q+1 : MacGoto1;
  374. ctrl-Q+2 : MacGoto2;
  375. ctrl-Q+3 : MacGoto3;
  376. ctrl-Q+4 : MacGoto4;
  377. ctrl-Q+5 : MacGoto5;
  378. ctrl-Q+6 : MacGoto6;
  379. ctrl-Q+7 : MacGoto7;
  380. ctrl-Q+8 : MacGoto8;
  381. ctrl-Q+9 : MacGoto9;
  382. ctrl-Q+[ : MacMatchPairForward;
  383. ctrl-Q+] : MacMatchPairBackward;
  384.  
  385. /* ---- Control O sequences ------------------ */
  386.  
  387. ctrl-O+^F : ToggleOptimalFillMode;
  388. ctrl-O+^I : ToggleAutoIndent;
  389. ctrl-O+^O : AddOptions;
  390. ctrl-O+^R : ToggleCursorThroughTabMode;
  391. ctrl-O+^T : ToggleTabbingMode;
  392. ctrl-O+^U : ToggleAutoOutdent;
  393.